home *** CD-ROM | disk | FTP | other *** search
/ Chip: Hang es video / CHIP_ZENESZERKESZTO_2005.ISO / audio_3 / visual / robotfunk / setup.exe / {app} / main.dxr / Internal_250.ls < prev    next >
Encoding:
Text File  |  2003-11-19  |  376 b   |  14 lines
  1. on saveallimg
  2.   xtraInst = new(xtra("SharpExport"))
  3.   thepath = "c:\flowui\"
  4.   cnt = 0
  5.   repeat with i = 1 to the number of castLibs
  6.     repeat with j = 1 to the number of castMembers
  7.       if member(j, i).type = #bitmap then
  8.         cnt = cnt + 1
  9.         xtraInst.exportBMP(member(j, i), thepath & string(i) & string(j) & ".bmp")
  10.       end if
  11.     end repeat
  12.   end repeat
  13. end
  14.